#include <iostream>
#include <sstream>
#include <vector>
#include <cctype>

int main() {
    std::string input;
    std::getline(std::cin, input);

    if (input.empty()) {
        std::cout << "Мало данных для анализа" << std::endl;
        return 0;
    }

    std::stringstream ss(input);
    std::vector<std::string> words;
    std::string word;

    while (ss >> word) {
        words.push_back(word);
    }

    int totalWords = words.size();
    int capitalCyrillic = 0;
    int latinChar = 0;
    int shortWords = 0;
    int maxWordLength = 0;
    std::string longestWord;
    int hyphenWords = 0;

    for (const auto& w : words) {
        if (isupper(w[0]) && iswalpha(w[0])) {
            capitalCyrillic++;
        }
        bool latinFound = false;
        for (char c : w) {
            if (isalpha(c) && islower(c)) {
                latinChar++;
                latinFound = true;
                break;
            }
        }
        if (w.size() <= 3) {
            shortWords++;
        }
        if (w.size() > maxWordLength) {
            maxWordLength = w.size();
            longestWord = w;
        }
        if (w.find('-') != std::string::npos) {
            hyphenWords++;
        }
    }

    std::cout << "Количество введенных слов: " << totalWords << std::endl;
    std::cout << "Количество слов, начинающихся с заглавной кириллической буквы: " << capitalCyrillic << std::endl;
    std::cout << "Количество слов, в которых есть хотя бы один латинский символ: " << latinChar << std::endl;
    std::cout << "Количество слов длиной не более 3 символов: " << shortWords << std::endl;
    std::cout << "Самое длинное слово: " << longestWord << std::endl;
    std::cout << "Длина самого длинного слова: " << maxWordLength << std::endl;
    std::cout << "Количество слов с символом дефиса \"-\": " << hyphenWords << std::endl;

    return 0;
}
